home *** CD-ROM | disk | FTP | other *** search
/ Cine Live 59 / Cine Live 59.iso / pc / Data / Interface / e2s.k < prev    next >
Encoding:
Text File  |  2002-06-05  |  6.3 KB  |  220 lines
  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$00000275,$000000E8,$000001DA,$0000029A,$00000000,$00000000,$00000000,$00000000};
  6.         LayoutWindow is {$00000109,$00000087,$000002A0,$00000245,$00000000,$00000000,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     Kind is DrawOpaque; 
  14.     Elements is [
  15.         oslide2,
  16.         oslide23,
  17.         oslide34
  18.     ];
  19.     Events is [
  20.         cOnscreenEvent
  21.         with Flags is $00000004; 
  22.             Commands is [
  23.                 cShowCommand
  24.                 with Flags is $00000004; Target is oslide2; end,
  25.                 cEnableCommand
  26.                 with Flags is $00000004; Target is oslide2; end,
  27.                 cFocusCommand
  28.                 with Target is oslide2; end,
  29.                 cRunCommand
  30.                 with Flags is $00000004; Target is oslide2; Rewind is true; end
  31.             ];
  32.         end
  33.     ];
  34. end;
  35.  
  36. object oslide2 is cImage
  37. with 
  38.     Flags is $00000150; 
  39.     Name is "slide"; 
  40.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  41.     
  42.     Width is 800; Height is 600; 
  43.     Duration is 2; Duration is 2; TimeScale is 1; 
  44.     URL is "../../Photos/Cravate%20Club/C%20Berling.jpg"; 
  45.     
  46.     
  47.     Events is [
  48.         cKeyboardEvent
  49.         with Flags is $00000004; Test is IsSpace; 
  50.             Commands is [
  51.                 cFocusCommand
  52.                 with Flags is $00000004; Target is oTargetSelf; end,
  53.                 cRunCommand
  54.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  55.             ];
  56.         end,
  57.         cMouseUpEvent
  58.         with Flags is $00000004; Flag is true; 
  59.             Commands is [
  60.                 cRunCommand
  61.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  62.                 cEnableCommand
  63.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  64.                 cShowCommand
  65.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  66.                 cRunCommand
  67.                 with Flags is $00000004; Target is oslide23; Mode is Clear; Rewind is true; end,
  68.                 cEnableCommand
  69.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  70.                 cShowCommand
  71.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  72.                 cBackCommand
  73.                 with Flags is $00000004; end
  74.             ];
  75.         end,
  76.         cFinishedEvent
  77.         with Flags is $00000004; 
  78.             Commands is [
  79.                 cShowCommand
  80.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  81.                 cEnableCommand
  82.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  83.                 cRunCommand
  84.                 with Flags is $00000004; Target is oslide2; Mode is Clear; Rewind is true; end,
  85.                 cFocusCommand
  86.                 with Flags is $00000004; Target is oslide23; end,
  87.                 cShowCommand
  88.                 with Flags is $00000004; Target is oslide23; end,
  89.                 cEnableCommand
  90.                 with Flags is $00000004; Target is oslide23; end,
  91.                 cRunCommand
  92.                 with Flags is $00000004; Target is oslide23; Rewind is true; end
  93.             ];
  94.         end
  95.     ];
  96. end;
  97.  
  98. object oslide23 is cImage
  99. with 
  100.     Flags is $00000150; 
  101.     Name is "slide2"; 
  102.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  103.     
  104.     Width is 800; Height is 600; 
  105.     Duration is 2; Duration is 2; TimeScale is 1; 
  106.     URL is "../../Photos/Cravate%20Club/E%20Baer.jpg"; 
  107.     
  108.     
  109.     Events is [
  110.         cKeyboardEvent
  111.         with Flags is $00000004; Test is IsSpace; 
  112.             Commands is [
  113.                 cFocusCommand
  114.                 with Flags is $00000004; Target is oTargetSelf; end,
  115.                 cRunCommand
  116.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  117.             ];
  118.         end,
  119.         cMouseUpEvent
  120.         with Flags is $00000004; Flag is true; 
  121.             Commands is [
  122.                 cEnableCommand
  123.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  124.                 cShowCommand
  125.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  126.                 cRunCommand
  127.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  128.                 cEnableCommand
  129.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  130.                 cShowCommand
  131.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  132.                 cRunCommand
  133.                 with Flags is $00000004; Target is oslide34; Mode is Clear; Rewind is true; end,
  134.                 cBackCommand
  135.                 with Flags is $00000004; end
  136.             ];
  137.         end,
  138.         cFinishedEvent
  139.         with Flags is $00000004; 
  140.             Commands is [
  141.                 cShowCommand
  142.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  143.                 cEnableCommand
  144.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  145.                 cRunCommand
  146.                 with Flags is $00000004; Target is oslide23; Mode is Clear; Rewind is true; end,
  147.                 cFocusCommand
  148.                 with Flags is $00000004; Target is oslide34; end,
  149.                 cShowCommand
  150.                 with Flags is $00000004; Target is oslide34; end,
  151.                 cEnableCommand
  152.                 with Flags is $00000004; Target is oslide34; end,
  153.                 cRunCommand
  154.                 with Flags is $00000004; Target is oslide34; Rewind is true; end
  155.             ];
  156.         end
  157.     ];
  158. end;
  159.  
  160. object oslide34 is cImage
  161. with 
  162.     Flags is $00000150; 
  163.     Name is "slide3"; 
  164.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  165.     
  166.     Width is 800; Height is 600; 
  167.     Duration is 2; Duration is 2; TimeScale is 1; 
  168.     URL is "../../Photos/Cravate%20Club/F%20Jardin.jpg"; 
  169.     
  170.     
  171.     Events is [
  172.         cKeyboardEvent
  173.         with Flags is $00000004; Test is IsSpace; 
  174.             Commands is [
  175.                 cFocusCommand
  176.                 with Flags is $00000004; Target is oTargetSelf; end,
  177.                 cRunCommand
  178.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  179.             ];
  180.         end,
  181.         cMouseUpEvent
  182.         with Flags is $00000004; Flag is true; 
  183.             Commands is [
  184.                 cEnableCommand
  185.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  186.                 cShowCommand
  187.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  188.                 cRunCommand
  189.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  190.                 cEnableCommand
  191.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  192.                 cShowCommand
  193.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  194.                 cRunCommand
  195.                 with Flags is $00000004; Target is oslide2; Mode is Clear; Rewind is true; end,
  196.                 cBackCommand
  197.                 with Flags is $00000004; end
  198.             ];
  199.         end,
  200.         cFinishedEvent
  201.         with Flags is $00000004; 
  202.             Commands is [
  203.                 cShowCommand
  204.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  205.                 cEnableCommand
  206.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  207.                 cRunCommand
  208.                 with Flags is $00000004; Target is oslide34; Mode is Clear; Rewind is true; end,
  209.                 cFocusCommand
  210.                 with Flags is $00000004; Target is oslide2; end,
  211.                 cShowCommand
  212.                 with Flags is $00000004; Target is oslide2; end,
  213.                 cEnableCommand
  214.                 with Flags is $00000004; Target is oslide2; end,
  215.                 cRunCommand
  216.                 with Flags is $00000004; Target is oslide2; Rewind is true; end
  217.             ];
  218.         end
  219.     ];
  220. end;